home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1998 July
/
EnigmA AMIGA RUN 29 (1998)(G.R. Edizioni)(IT)[!][issue 1998-07 & 08].iso
/
earkit
/
browser
/
webmaker
/
install
/
install_webmaker
< prev
next >
Wrap
Text File
|
1998-05-24
|
19KB
|
569 lines
;;;;
;;;;
;;;; Install_WM - WebMaker installation script for Installer
;;;;
;;;; Copyright © 1996 Pascal Rullier
;;;; All Right reserved.
;;;; email prullier@mail.atlantic-line.fr
;;;; $Id: Install_WM,v 1.1 1996/03/30 14:17:19 rullier Exp $
;;;;
;;;; This script has been tested with Installer 1.24:
;;;;
;;;; Installer and Installer project icon
;;;; (c) Copyright 1991-93 Commodore-Amiga, Inc. All Rights Reserved.
;;;; Reproduced and distributed under license from Commodore.
;;;;
;;;; INSTALLER SOFTWARE IS PROVIDED "AS-IS" AND SUBJECT TO CHANGE;
;;;; NO WARRANTIES ARE MADE. ALL USE IS AT YOUR OWN RISK. NO LIABILITY
;;;; OR RESPONSIBILITY IS ASSUMED.
;;;;
;;;; Use following Icon tooltypes / Command line options:
;;;; APPNAME=WebMaker
;;;; MINUSER=AVERAGE
;;;;
(complete 0)
(set locale 0)
(set #welcome (cat "Welcome to the " @app-name " 1.1 installation\n\nShareWare\nbut 100% usable\nSend me your contribution *8)\n\n\n\n© 1996 Pascal Rullier\nemail: prullier@mail.atlantic-line.fr"))
(set #bad-MUI (cat "You need at least MUI3.1 to use WebMaker 1.1."))
(set #dir-choice (cat "Select the directory where the WebMaker Directory will be created." ))
(set #copy (cat "Copying WebMaker"))
(set #copy-extras (cat "Copying Extras"))
(set #cpu (cat "Choose your cpu"))
(set #lib-copy (cat "Copying TextField Gadget"))
(set #doc-file (cat "/Documentations/WebMaker-English.guide"))
(set #doc-copy (cat "Copying Documentation"))
(set #doc-online (cat "/Documentations/WebMaker-English-online.guide"))
(set #doc-history (cat "/history"))
(set #installcatalog (cat "\n\nDo you want to install the english catalog ?"))
(set #copycatalog (cat "Copying English catalog"))
(set #catalogname (cat "/Catalogs/English/WebMaker.catalog"))
(set #destname (cat "Catalogs/English"))
(set #tooltype-prompt (cat "Setting tooltypes"))
(set #tooltype-local (cat "Where are your HTML documents ?"))
(set #tooltype-author (cat "Enter your name"))
(set #help-author (cat "Your name is required to have informations about creating people"))
(set #tooltype-email (cat "Enter your email"))
(set #help-email (cat "Your email is required to sign your documents"))
(set #tooltype-isobuffer (cat "Do you want to work\nwith an ISO-Latin buffer???"))
(set #tooltype-entities (cat "Do you want to save\nyour documents with entities ???"))
(set #tooltype-entities-help (cat "Some servers don't support ISO-Latin syntax, entities are used instead."))
;===========================================================================
; French strings
(if (= @language "français")
(
(set locale 1)
;;
;; Made by author
;;
(set #welcome (cat "\n\nBienvenue dans l'installation de\n" @app-name " 1.1\n\nShareWare\nmais 100% fonctionnel\nEnvoyez-moi votre contribution *8)\n\n\n\n© 1996 Pascal Rullier\nemail: prullier@mail.atlantic-line.fr"))
(set #bad-MUI (cat "Vous avez besoin au moins de MUI3.1 pour utiliser WebMaker 1.1." ))
(set #dir-choice (cat "Sélectionnez le répertoire dans lequel vous voulez installer le répertoire WebMaker." ))
(set #copy (cat "Copie des éléments indispensables pour WebMaker"))
(set #copy-extras (cat "Copie des extras"))
(set #cpu (cat "Choisissez l'exécutable qui correspond le mieux à votre machine"))
(set #lib-copy (cat "Installation du gadget TextField"))
(set #doc-file (cat "/Documentations/WebMaker-Français.guide"))
(set #doc-copy (cat "Copie de la Documentation"))
(set #doc-online (cat "/Documentations/WebMaker-Français-online.guide"))
(set #doc-history (cat "/history"))
(set #copycatalog (cat "Installation du catalogue Français."))
(set #catalogname (cat "/Catalogs/Français/WebMaker.catalog"))
(set #destname (cat "Catalogs/Français"))
(set #tooltype-prompt (cat "Paramêtrage des types d'outils"))
(set #tooltype-local (cat "Choix du répertoire de vos documents HTML"))
(set #tooltype-author (cat "Entrez votre nom"))
(set #help-author (cat "Votre nom est demandé pour avoir des infos sur le créateur"))
(set #tooltype-email (cat "Entrez votre email"))
(set #help-email (cat "Votre email est demandée pour signer vos documents"))
(set #tooltype-isobuffer (cat "Voulez-vous travailler\navec un buffer en ISO-Latin ???"))
(set #tooltype-entities (cat "Voulez-vous sauver\nvos documents avec des entités ???"))
(set #tooltype-entities-help (cat "Certains serveurs ne supportent pas l'ISO-Latin, les entités sont alors utilisées."))
))
;===========================================================================
; German strings
(if (= @language "deutsch")
(
(set locale 2)
;;
;; Made by Andreas Rossbacher <andreas_r@titan.ping.de>
;;
(set #welcome (cat "Willkommen zur " @app-name " 1.1 Installation\n\nShareWare\nbut 100% usable\nSend me your contribution *8)\n\n\n\n© 1996 Pascal Rullier\nemail: prullier@mail.atlantic-line.fr"))
(set #bad-MUI (cat "Sie brauchen mindestens MUI3.1+ um WebMaker 1.1 zu benutzen."))
(set #dir-choice (cat "Wählen sie das Verzeichnis wo das WebMaker Verzeichnis erstellt werden soll." ))
(set #copy (cat "Copiere WebMaker"))
(set #copy-extras (cat "Copiere Extras"))
(set #cpu (cat "Wählen sie ihren Prozessor"))
(set #lib-copy (cat "Copiere TextField Gadget"))
(set #doc-file (cat "/Documentations/WebMaker-Deutsch.guide"))
(set #doc-copy (cat "Copiere Dokumentation"))
(set #doc-online (cat "/Documentations/WebMaker-Deutsch-online.guide"))
(set #doc-history (cat "/history"))
(set #installcatalog (cat "\n\nWollen Sie den Deutschen Katalog installieren?"))
(set #copycatalog (cat "Copiere Deutschen Katalog"))
(set #catalogname (cat "/Catalogs/Deutsch/WebMaker.catalog"))
(set #destname (cat "Catalogs/Deutsch"))
(set #tooltype-prompt (cat "Setze Tooltypes"))
(set #tooltype-local (cat "Wo befinden sich Ihre HTML Dokumente?"))
(set #tooltype-author (cat "Geben sie Ihren Namen ein"))
(set #help-author (cat "Ihr Name wird für die Informationen des Erstellers im HTML Dok benötigt"))
(set #tooltype-email (cat "Geben sie Ihre EMail Adresse ein"))
(set #help-email (cat "Ihre EMail Adresse wird zum signieren der Dokumente benötigt"))
(set #tooltype-isobuffer (cat "Wollen Sie mit\neinem ISO-Latin Puffer arbeiten???"))
(set #tooltype-entities (cat "Wollen Sie Ihre Dokumente\n mit Entity sichern???"))
(set #tooltype-entities-help (cat "Manche Server unterstützen keinen ISO-Latin Zeichensatz. Als Ersatz werden Entities benutzt."))
))
;===========================================================================
; Português strings
(if (= @language "português")
(
(set locale 0)
))
;===========================================================================
; Nederlands strings
(if (= @language "nederlands")
(
(set locale 3)
;;
;; Made by Ivo Kroone <ivo@pimpernel.nl>
;;
(set #welcome (cat "Welkom bij de " @app-name " 1.1 installatie\n\nShareWare\nbut 100% usable\nSend me your contribution *8)\n\n\n\n© 1996 Pascal Rullier\nemail: prullier@mail.atlantic-line.fr"))
(set #bad-MUI (cat "MUI3.1+ is minimaal vereist om WebMaker 1.1. te gebruiken"))
(set #dir-choice (cat "Kies een directory waar WebMaker een eigen directory mag maken."))
(set #copy (cat "Copy WebMaker"))
(set #copy-extras (cat "Copy Extras"))
(set #cpu (cat "Kies de gebruikte CPU"))
(set #lib-copy (cat "Copyeer TextField Gadget"))
(set #doc-file (cat "/Documentations/WebMaker-English.guide"))
(set #doc-copy (cat "Copy Documentation"))
(set #doc-online (cat "/Documentations/WebMaker-English-online.guide"))
(set #doc-history (cat "/history"))
(set #installcatalog (cat "\n\Ook de Engelse vertaling installeren?"))
(set #copycatalog (cat "Copy catalog Engels"))
(set #catalogname (cat "/Catalogs/Nederlands/WebMaker.catalog"))
(set #destname (cat "Catalogs/Nederlands"))
(set #tooltype-prompt (cat "Zet tooltypes"))
(set #tooltype-local (cat "Waar zijn de te bewerken HTML documenten?"))
(set #tooltype-author (cat "Geef uw naam"))
(set #help-author (cat "Uw naam is vereist om informatie te hebben over mensen die pages maken"))
(set #tooltype-email (cat "Geef uw E-mail adres"))
(set #help-email (cat "Het E-mail wordt gebruikt om als referentie in de documenten te gebruiken"))
(set #tooltype-isobuffer (cat "Wilt u werken met een\n ISO-Latin buffer???"))
(set #tooltype-entities (cat "Wilt u de documenten wegschrijven\nmet entiteiten?"))
(set #tooltype-entities-help (cat "Sommige servers ondersteunen ISO-Latin niet, in dat geval worden entiteiten gebruikt"))
))
;===========================================================================
; Italian strings
(if (= @language "italiano")
(
(set locale 6)
(set #welcome (cat "Benvenuto all'installazione di " @app-name " 1.1\n\nShareWare\nbut 100% usable\nSend me your contribution *8)\n\n\n\n© 1996 Pascal Rullier\nemail: prullier@mail.atlantic-line.fr"))
(set #bad-MUI (cat "E' necessaria almeno la MUI3.1+ per usare WebMaker 1.1." ))
(set #dir-choice (cat "Scegli la directory dove creare la directory di WebMaker" ))
(set #copy (cat "Sto copiando WebMaker"))
(set #copy-extras (cat "Sto copiando gli Extras"))
(set #cpu (cat "Scegli la tua cpu"))
(set #lib-copy (cat "Sto copiando il TextField Gadget"))
(set #doc-file (cat "/Documentations/WebMaker-English.guide"))
(set #doc-copy (cat "Sto copiando la documentazione"))
(set #doc-online (cat "/Documentations/WebMaker-English-online.guide"))
(set #doc-history (cat "/history"))
(set #installcatalog (cat "\n\nVuoi installare il catalog italiano ?"))
(set #copycatalog (cat "Sto copiando il catalog italiano"))
(set #catalogname (cat "/Catalogs/italiano/WebMaker.catalog"))
(set #destname (cat "Catalogs/italiano"))
(set #tooltype-prompt (cat "Settaggio dei tooltypes"))
(set #tooltype-local (cat "Dove si trovano i tuoi documenti HTML ?"))
(set #tooltype-author (cat "Inserisci il tuo nome"))
(set #help-author (cat "Il tuo nome viene richiesto per avere informazioni sul creatore dei documenti"))
(set #tooltype-email (cat "Inserisci il tuo indirizzo di posta elettronica"))
(set #help-email (cat "Il tuo indirizzo viene richiesto per la firma dei tuoi documenti"))
(set #tooltype-isobuffer (cat "Vuoi utilizzare\n un buffer in formato ISO-Latin ???"))
(set #tooltype-entities (cat "Vuoi salvare\n i tuoi documenti con le entita' ???"))
(set #tooltype-entities-help (cat "Alcuni server non supportano la sintassi ISO-Latin, ma utilizzano le entita'."))
))
;===========================================================================
; Norsk strings (Norwegian)
(if (= @language "norsk")
(
(set locale 7)
;;
;; Made by borseman@telepost.no
;;
(set #welcome (cat "Velkommen til installasjonen av " @app-name " 1.1\n\nShareWare\nbut 100% usable\nSend me your contribution *8)\n\n\n\n© 1996 Pascal Rullier\nemail: prullier@mail.atlantic-line.fr"))
(set #bad-MUI (cat "Du må ha minst MUI3.1 eller senere for å kunne bruke WebMaker 1.1"))
(set #dir-choice (cat "Velg sted hvor du vil ha WebMaker-skuffen" ))
(set #copy (cat "Kopierer WebMaker"))
(set #copy-extras (cat "Kopierer extras"))
(set #cpu (cat "Velg prosessor"))
(set #lib-copy (cat "Kopierer TextField Gadget"))
(set #doc-file (cat "/Documentations/WebMaker-English.guide"))
(set #doc-copy (cat "Kopierer dokumentasjon"))
(set #doc-online (cat "/Documentations/WebMaker-English-online.guide"))
(set #doc-history (cat "/history"))
(set #installcatalog (cat "\n\nVil du kopiere den norske katalogen?"))
(set #copycatalog (cat "Kopierer norsk katalog."))
(set #catalogname (cat "/Catalogs/Norsk/WebMaker.catalog"))
(set #destname (cat "Catalogs/Norsk"))
(set #tooltype-prompt (cat "Setter tooltypes"))
(set #tooltype-local (cat "Hvor befinner HTML-dokumentene dine seg?"))
(set #tooltype-author (cat "Skriv inn navnet ditt"))
(set #help-author (cat "Nødvendig for at alle HTML-dokumenter du lager skal inneholde informasjon om hvem som har laget dem."))
(set #tooltype-email (cat "Skriv inn din Epost-adresse"))
(set #help-email (cat "Epost-adressen er nødvendig for å signere dokumenenter."))
(set #tooltype-isobuffer (cat "Vil du jobbe med\nen ISO-Latin buffer?"))
(set #tooltype-entities (cat "Vil du lagre dokumentene\ndine med spesialtegn?"))
(set #tooltype-entities-help (cat "Noen servere støtter ikke ISO-Latin syntax, i stedet brukes spesialtegn."))
))
;======================================
; Suomi
(if (= @language "suomi")
(
(set locale 8)
;;
;; Made by man@sci.fi
;;
(set #welcome (cat "Tervetuloa " @app-name " installointiin\n\nShareWare\nbut 100% usable\nSend me your contribution *8)\n\n\n\n© 1996 Pascal Rullier\nemail: prullier@mail.atlantic-line.fr"))
(set #bad-MUI (cat "Tarvitset vähintään MUI3.1+ käyttääksesi WebMaker 1.1.:tä"))
(set #dir-choice (cat "Valitse hakemisto johon luodaan WebMaker-hakemisto" ))
(set #copy (cat "Kopioidaan WebMaker"))
(set #copy-extras (cat "Kopioidaan Extras"))
(set #cpu (cat "valitse cpu:si"))
(set #lib-copy (cat "Kopioidaan TextField Gadget"))
(set #doc-file (cat "/Documentations/WebMaker-English.guide"))
(set #doc-copy (cat "Kopioin dokumentit"))
(set #doc-online (cat "/Documentations/WebMaker-English-online.guide"))
(set #doc-history (cat "/history"))
(set #installcatalog (cat "\n\nHaluatko asentaa suomenkielisen catalogin ?"))
(set #copycatalog (cat "Kopioidaan suomenkielinen catalogi"))
(set #catalogname (cat "/Catalogs/Suomi/WebMaker.catalog"))
(set #destname (cat "Catalogs/Suomi"))
(set #tooltype-prompt (cat "Asetetaan tooltypet"))
(set #tooltype-local (cat "Missä ovat HTML-documenttisi ?"))
(set #tooltype-author (cat "Syötä nimesi"))
(set #help-author (cat "Nimesi tarvitaan henkilöiden luomistietoihin"))
(set #tooltype-email (cat "Syötä email-osoitteesi"))
(set #help-email (cat "Email-osoitteesi tarvitaan dokumenttiesi allekirjoitukseen"))
(set #tooltype-isobuffer (cat "Haluatko työskennellä\nISO-Latin bufferin kanssa???"))
(set #tooltype-entities (cat "Haluatko tallentaa\ndokumenttisi entitieseillä ???"))
(set #tooltype-entities-help (cat "Jotkut palvelimet eivät tue ISO-Latin merkistöä, entitiesejä käytetään niiden sijasta."))
))
;===========================================================================
; svenska strings
;
; Sorry fabbe, your catalog was corrupted... Please use the empty .ct
;
(if (= @language "svenska")
(
(set locale 9)
(set #doc-file (cat "/Documentations/WebMaker-Svenska.guide"))
))
;=============================================================================
(message #welcome)
(welcome)
;=============================================================================
; Installation procedure
(set WMdir "ram:")
;========================================================================
;
; Scanning MUI version
;
(set vernum1 (getversion "MUI:LIBS/muimaster.library" ) )
(set ver1 (/ vernum1 65536))
(set rev1 (- vernum1 (* ver1 65536)))
;(message vernum1 ":" ver1 "." rev1)
;( if (< ver1 10)
;(if (< (exists "mui:") 2)
; ( abort #bad-MUI )
; )
;========================================================================
;
; Select the WebMaker directory
;
(set WMdir
( askdir
( prompt #dir-choice )
(help "")
(default "ram:")
(newpath)
)
)
;========================================================================
;
; Copying WebMaker
;
(complete 10)
(set WMdir ( tackon WMdir "Webmaker" ) )
(set @default-dest WMdir )
(if (= 0 (askchoice (prompt #cpu)
(help @askchoice-help)
(choices "WebMaker.000" "WebMaker.020")
(default 0)))
(set #good-exe "/WebMaker.000")
(set #good-exe "/WebMaker.020"))
(copyfiles
(prompt #copy)
(source #good-exe)
(help @copyfiles-help)
(infos)
(dest WMdir)
(newname @app-name)
)
(copyfiles
(source "/WebMaker.020.info")
(help @copyfiles-help)
(dest WMdir)
(newname (cat WMdir ".info"))
)
(copyfiles
(source "/")
(help @copyfiles-help)
(dest WMdir)
(prompt #copy)
(choices "Images")
(confirm)
)
(copyfiles
(prompt #copy-extras)
(source "/")
(choices "Contribs"
"Demos")
(help @copyfiles-help)
(infos)
(dest WMdir)
(confirm)
)
;========================================================================
;
; Copying textfield.gadget
;
(copylib
(source "/gadgets/textfield.gadget")
(dest "SYS:Classes/gadgets")
(prompt #libcopy)
(help @copylib-help)
(confirm)
)
(complete 40)
;========================================================================
;
; Copying documentation
;
( set WMdoc ( tackon WMdir "Documentations" ) )
(copyfiles
(prompt #doc-copy)
(source #doc-file)
(newname "WebMaker.guide")
(help @copyfiles-help)
(infos)
(confirm)
(dest WMdoc )
)
(copyfiles
(source "/Documentations.info")
(newname (cat WMdoc ".info"))
(dest WMdir)
)
(complete 50)
(copyfiles
(prompt #doc-copy)
(source #doc-online)
(help @copyfiles-help)
(infos)
(confirm)
(newname "WebMaker.guide")
(dest WMdir )
)
(complete 60)
(copyfiles
(prompt #doc-copy)
(source #doc-history)
(help @copyfiles-help)
(infos)
(confirm)
(newname "history")
(dest WMdir )
)
;========================================================================
;
; copying WebMaker.catalog files
;
(complete 70)
( set WMcat ( tackon WMdir #destname ) )
(makedir (tackon WMdir "Catalogs"))
(makedir WMCat)
(complete 80)
(if (> locale 0)
(copyfiles
(prompt #copycatalog)
(source #catalogname)
(dest WMcat)
(newname "WebMaker.catalog")
(help @copyfiles-help)
(infos)
(confirm)
)
)
(complete 90)
(tooltype (prompt #tooltype-prompt)
(help)
(dest (tackon WMdir "WebMaker"))
(settooltype "LOCALROOT" (askdir (prompt #tooltype-local)
(help)
(default "http:docs/")))
)
(tooltype (prompt #tooltype-prompt)
(help)
(dest (tackon WMdir "WebMaker"))
(settooltype "AUTHOR" (askstring (prompt #tooltype-author)
(help #help-author)))
)
(tooltype (prompt #tooltype-prompt)
(help)
(dest (tackon WMdir "WebMaker"))
(settooltype "EMAIL" (askstring (prompt #tooltype-email)
(help #help-email)))
)
(tooltype (prompt #tooltype-prompt)
(help)
(dest (tackon WMdir "WebMaker"))
(settooltype "ISOBUFFER" (if (= 0 (askbool (prompt #tooltype-isobuffer)
(default 1)
(help @askbool-help)))
"NO"
"YES"))
)
(tooltype (prompt #tooltype-prompt)
(help)
(dest (tackon WMdir "WebMaker"))
(settooltype "ENTITIESSAVING" (if (= 0 (askbool (prompt #tooltype-entities)
(default 1)
(help #tooltype-entities-help)))
"NO"
"YES"))
)
(complete 100)
(exit)